home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The Casino• / •Las Vegas• / MacBandit 1.1 •••• / MacBandit 1.1 ееее.rsrc / CODE_1.txt < prev    next >
Text File  |  1990-10-09  |  26KB  |  484 lines
  1. # near model CODE resource
  2. # jump table entries: 0-9 (10 of them)
  3. 00000000  0000 0000                ori.b      D0, 0x0
  4. 00000004  0000 008A                ori.b      D0, 0x8A
  5. export_0:
  6. 00000008  4278 0A4A                clr.w      [0x00000A4A /* FPState */]
  7. 0000000C  9DCE                     sub.l      A6, A6
  8. 0000000E  2C3C 5354 5253           move.l     D6, 0x53545253 /* 'STRS' */
  9. 00000014  4EBA 037C                jsr        [PC + 0x37C /* 00000392 */]
  10. 00000018  41FA FFE6                lea.l      A0, [PC - 0x1A /* 00000000, value 0x0, cstring "" */]
  11. 0000001C  208C                     move.l     [A0], A4
  12. 0000001E  4EBA 007C                jsr        [PC + 0x7C /* 0000009C */]
  13. 00000022  4EBA 02A2                jsr        [PC + 0x2A2 /* 000002C6 */]
  14. 00000026  4267                     clr.w      -[A7]
  15. 00000028  4879 0000 FFFF           push.l     0xFFFF
  16. 0000002E  486F 0004                pea.l      [A7 + 0x4]
  17. 00000032  4857                     pea.l      [A7]
  18. 00000034  3F3C 0001                move.w     -[A7], 0x1
  19. 00000038  223A FFCA                move.l     D1, [PC - 0x36 /* 00000004, value 0x8A, cstring "" */]
  20. 0000003C  4EB5 1000                jsr        [A5 + D1.w]
  21. 00000040  A9F4                     syscall    ExitToShell
  22. 00000042  4EBA 0334                jsr        [PC + 0x334 /* 00000378 */]
  23. 00000046  4EBA 02AE                jsr        [PC + 0x2AE /* 000002F6 */]
  24. 0000004A  4E75                     rts
  25. 0000004C  48E7 FFF8                movem.l    -[A7], D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3,A4
  26. 00000050  3E2F 003C                move.w     D7, [A7 + 0x3C]
  27. 00000054  50F8 0A5E                st         [0x00000A5E /* ResLoad */]
  28. 00000058  598F                     subq.l     A7, 4
  29. 0000005A  2F3C 434F 4445           move.l     -[A7], 0x434F4445 /* 'CODE' */
  30. 00000060  3F07                     move.w     -[A7], D7
  31. 00000062  A9A0                     syscall    GetResource
  32. 00000064  201F                     move.l     D0, [A7]+
  33. 00000066  6730                     beq        +0x32 /* 00000098 */
  34. 00000068  2640                     movea.l    A3, D0
  35. 0000006A  2453                     movea.l    A2, [A3]
  36. 0000006C  0892 0007                bclr.b     [A2], 0x7
  37. 00000070  6720                     beq        +0x22 /* 00000092 */
  38. 00000072  4EBA 0098                jsr        [PC + 0x98 /* 0000010C */]
  39. 00000076  A029                     syscall    HLock
  40. 00000078  598F                     subq.l     A7, 4
  41. 0000007A  2F3C 4352 454C           move.l     -[A7], 0x4352454C /* 'CREL' */
  42. 00000080  3F07                     move.w     -[A7], D7
  43. 00000082  A9A0                     syscall    GetResource
  44. 00000084  4EBA 0098                jsr        [PC + 0x98 /* 0000011E */]
  45. 00000088  201F                     move.l     D0, [A7]+
  46. 0000008A  670C                     beq        +0xE /* 00000098 */
  47. 0000008C  2040                     movea.l    A0, D0
  48. 0000008E  4EBA 0058                jsr        [PC + 0x58 /* 000000E8 */]
  49. label00000092:
  50. 00000092  4CDF 1FFF                movem.l    D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3,A4, [A7]+
  51. 00000096  4E75                     rts
  52. label00000098:
  53. 00000098  700F                     moveq.l    D0, 0x0F
  54. 0000009A  A9C9                     syscall    SysError
  55. fn0000009C:
  56. 0000009C  598F                     subq.l     A7, 4
  57. 0000009E  2F3C 5A45 524F           move.l     -[A7], 0x5A45524F /* 'ZERO' */
  58. 000000A4  4267                     clr.w      -[A7]
  59. 000000A6  A9A0                     syscall    GetResource
  60. 000000A8  2457                     movea.l    A2, [A7]
  61. 000000AA  598F                     subq.l     A7, 4
  62. 000000AC  2F3C 4441 5441           move.l     -[A7], 0x44415441 /* 'DATA' */
  63. 000000B2  4267                     clr.w      -[A7]
  64. 000000B4  A9A0                     syscall    GetResource
  65. 000000B6  2057                     movea.l    A0, [A7]
  66. 000000B8  2050                     movea.l    A0, [A0]
  67. 000000BA  2278 0908                movea.l    A1, [0x00000908 /* CurStackBase */]
  68. 000000BE  2452                     movea.l    A2, [A2]
  69. 000000C0  600E                     bra        +0x10 /* 000000D0 */
  70. label000000C2:
  71. 000000C2  32D8                     move.w     [A1]+, [A0]+
  72. 000000C4  660A                     bne        +0xC /* 000000D0 */
  73. 000000C6  321A                     move.w     D1, [A2]+
  74. 000000C8  6002                     bra        +0x4 /* 000000CC */
  75. label000000CA:
  76. 000000CA  4219                     clr.b      [A1]+
  77. label000000CC:
  78. 000000CC  51C9 FFFC                dbf        D1, -0x6 /* 000000CA */
  79. label000000D0:
  80. 000000D0  BBC9                     cmpa.l     A5, A1
  81. 000000D2  66EE                     bne        -0x10 /* 000000C2 */
  82. 000000D4  A9A3                     syscall    ReleaseResource
  83. 000000D6  A9A3                     syscall    ReleaseResource
  84. 000000D8  598F                     subq.l     A7, 4
  85. 000000DA  2F3C 4452 454C           move.l     -[A7], 0x4452454C /* 'DREL' */
  86. 000000E0  4267                     clr.w      -[A7]
  87. 000000E2  A9A0                     syscall    GetResource
  88. 000000E4  205F                     movea.l    A0, [A7]+
  89. 000000E6  244D                     movea.l    A2, A5
  90. fn000000E8:
  91. 000000E8  A025                     syscall    GetHandleSize
  92. 000000EA  2F08                     move.l     -[A7], A0
  93. 000000EC  2050                     movea.l    A0, [A0]
  94. 000000EE  E240                     asr        D0.w, 1
  95. 000000F0  6012                     bra        +0x14 /* 00000104 */
  96. label000000F2:
  97. 000000F2  240D                     move.l     D2, A5
  98. 000000F4  3218                     move.w     D1, [A0]+
  99. 000000F6  0881 0000                bclr.b     D1, 0x0
  100. 000000FA  6704                     beq        +0x6 /* 00000100 */
  101. 000000FC  243A FF02                move.l     D2, [PC - 0xFE /* 00000000, value 0x0, cstring "" */]
  102. label00000100:
  103. 00000100  D5B2 1000                add.l      [A2 + D1.w], D2
  104. label00000104:
  105. 00000104  51C8 FFEC                dbf        D0, -0x16 /* 000000F2 */
  106. 00000108  A9A3                     syscall    ReleaseResource
  107. 0000010A  4E75                     rts
  108. fn0000010C:
  109. 0000010C  204B                     movea.l    A0, A3
  110. 0000010E  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  111. 00000112  6A04                     bpl        +0x6 /* 00000118 */
  112. 00000114  1613                     move.b     D3, [A3]
  113. 00000116  4E75                     rts
  114. label00000118:
  115. 00000118  A069                     syscall    HGetState
  116. 0000011A  1600                     move.b     D3, D0
  117. 0000011C  4E75                     rts
  118. fn0000011E:
  119. 0000011E  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  120. 00000122  6A04                     bpl        +0x6 /* 00000128 */
  121. 00000124  1683                     move.b     [A3], D3
  122. 00000126  4E75                     rts
  123. label00000128:
  124. 00000128  204B                     movea.l    A0, A3
  125. 0000012A  1003                     move.b     D0, D3
  126. 0000012C  A06A                     syscall    HSetState
  127. 0000012E  4E75                     rts
  128. export_1:
  129. 00000130  205F                     movea.l    A0, [A7]+
  130. 00000132  3218                     move.w     D1, [A0]+
  131. label00000134:
  132. 00000134  3418                     move.w     D2, [A0]+
  133. 00000136  B058                     cmp.w      D0, [A0]+
  134. 00000138  57C9 FFFA                dbeq       D1, -0x8 /* 00000134 */
  135. 0000013C  4A42                     tst.w      D2
  136. label0000013E:
  137. 0000013E  67FE                     beq        -0x0 /* 0000013E */
  138. 00000140  4EF0 20FC                jmp        [A0 + D2.w - 0x4]
  139. export_2:
  140. 00000144  205F                     movea.l    A0, [A7]+
  141. 00000146  3218                     move.w     D1, [A0]+
  142. label00000148:
  143. 00000148  3418                     move.w     D2, [A0]+
  144. 0000014A  B098                     cmp.l      D0, [A0]+
  145. 0000014C  57C9 FFFA                dbeq       D1, -0x8 /* 00000148 */
  146. 00000150  4A42                     tst.w      D2
  147. label00000152:
  148. 00000152  67FE                     beq        -0x0 /* 00000152 */
  149. 00000154  4EF0 20FA                jmp        [A0 + D2.w - 0x6]
  150. export_3:
  151. 00000158  205F                     movea.l    A0, [A7]+
  152. 0000015A  3218                     move.w     D1, [A0]+
  153. 0000015C  3418                     move.w     D2, [A0]+
  154. 0000015E  B042                     cmp.w      D0, D2
  155. 00000160  6E0A                     bgt        +0xC /* 0000016C */
  156. 00000162  9041                     sub.w      D0, D1
  157. 00000164  6D06                     blt        +0x8 /* 0000016C */
  158. 00000166  D040                     add.w      D0, D0
  159. 00000168  41F0 0002                lea.l      A0, [A0 + D0.w + 0x2]
  160. label0000016C:
  161. 0000016C  3010                     move.w     D0, [A0]
  162. label0000016E:
  163. 0000016E  67FE                     beq        -0x0 /* 0000016E */
  164. 00000170  4EF0 0000                jmp        [A0 + D0.w]
  165. export_4:
  166. 00000174  202F 0004                move.l     D0, [A7 + 0x4]
  167. 00000178  2F41 0004                move.l     [A7 + 0x4], D1
  168. 0000017C  222F 0008                move.l     D1, [A7 + 0x8]
  169. 00000180  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  170. 00000184  48E7 3C00                movem.l    -[A7], D2,D3,D4,D5
  171. 00000188  2400                     move.l     D2, D0
  172. 0000018A  2601                     move.l     D3, D1
  173. 0000018C  4842                     swap.w     D2
  174. 0000018E  C4C3                     mulu.w     D2, D3
  175. 00000190  2800                     move.l     D4, D0
  176. 00000192  2A01                     move.l     D5, D1
  177. 00000194  4845                     swap.w     D5
  178. 00000196  C8C5                     mulu.w     D4, D5
  179. 00000198  D444                     add.w      D2, D4
  180. 0000019A  4842                     swap.w     D2
  181. 0000019C  4242                     clr.w      D2
  182. 0000019E  C0C1                     mulu.w     D0, D1
  183. 000001A0  D082                     add.l      D0, D2
  184. 000001A2  4CDF 003C                movem.l    D2,D3,D4,D5, [A7]+
  185. 000001A6  221F                     move.l     D1, [A7]+
  186. 000001A8  4E75                     rts
  187. export_5:
  188. 000001AA  202F 0004                move.l     D0, [A7 + 0x4]
  189. 000001AE  2F41 0004                move.l     [A7 + 0x4], D1
  190. 000001B2  222F 0008                move.l     D1, [A7 + 0x8]
  191. 000001B6  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  192. 000001BA  48E7 3100                movem.l    -[A7], D2,D3,D7
  193. 000001BE  4EBA 009C                jsr        [PC + 0x9C /* 0000025C */]
  194. 000001C2  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  195. 000001C6  221F                     move.l     D1, [A7]+
  196. 000001C8  4E75                     rts
  197. export_6:
  198. 000001CA  202F 0004                move.l     D0, [A7 + 0x4]
  199. 000001CE  2F41 0004                move.l     [A7 + 0x4], D1
  200. 000001D2  222F 0008                move.l     D1, [A7 + 0x8]
  201. 000001D6  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  202. 000001DA  48E7 3100                movem.l    -[A7], D2,D3,D7
  203. 000001DE  4EBA 007C                jsr        [PC + 0x7C /* 0000025C */]
  204. 000001E2  2001                     move.l     D0, D1
  205. 000001E4  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  206. 000001E8  221F                     move.l     D1, [A7]+
  207. 000001EA  4E75                     rts
  208. export_7:
  209. 000001EC  202F 0004                move.l     D0, [A7 + 0x4]
  210. 000001F0  2F41 0004                move.l     [A7 + 0x4], D1
  211. 000001F4  222F 0008                move.l     D1, [A7 + 0x8]
  212. 000001F8  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  213. 000001FC  48E7 3100                movem.l    -[A7], D2,D3,D7
  214. 00000200  4EBA 002C                jsr        [PC + 0x2C /* 0000022E */]
  215. 00000204  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  216. 00000208  221F                     move.l     D1, [A7]+
  217. 0000020A  4E75                     rts
  218. export_8:
  219. 0000020C  202F 0004                move.l     D0, [A7 + 0x4]
  220. 00000210  2F41 0004                move.l     [A7 + 0x4], D1
  221. 00000214  222F 0008                move.l     D1, [A7 + 0x8]
  222. 00000218  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  223. 0000021C  48E7 3100                movem.l    -[A7], D2,D3,D7
  224. 00000220  4EBA 000C                jsr        [PC + 0xC /* 0000022E */]
  225. 00000224  2001                     move.l     D0, D1
  226. 00000226  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  227. 0000022A  221F                     move.l     D1, [A7]+
  228. 0000022C  4E75                     rts
  229. fn0000022E:
  230. 0000022E  4A80                     tst.l      D0
  231. 00000230  6A1C                     bpl        +0x1E /* 0000024E */
  232. 00000232  4A81                     tst.l      D1
  233. 00000234  6A0C                     bpl        +0xE /* 00000242 */
  234. 00000236  4480                     neg.l      D0
  235. 00000238  4481                     neg.l      D1
  236. 0000023A  4EBA 0020                jsr        [PC + 0x20 /* 0000025C */]
  237. 0000023E  4481                     neg.l      D1
  238. 00000240  4E75                     rts
  239. label00000242:
  240. 00000242  4480                     neg.l      D0
  241. 00000244  4EBA 0016                jsr        [PC + 0x16 /* 0000025C */]
  242. 00000248  4480                     neg.l      D0
  243. 0000024A  4481                     neg.l      D1
  244. 0000024C  4E75                     rts
  245. label0000024E:
  246. 0000024E  4A81                     tst.l      D1
  247. 00000250  6A0A                     bpl        +0xC /* 0000025C */
  248. 00000252  4481                     neg.l      D1
  249. 00000254  4EBA 0006                jsr        [PC + 0x6 /* 0000025C */]
  250. 00000258  4480                     neg.l      D0
  251. 0000025A  4E75                     rts
  252. fn0000025C:
  253. 0000025C  2E3C 0000 FFFF           move.l     D7, 0xFFFF
  254. 00000262  B280                     cmp.l      D1, D0
  255. 00000264  6306                     bls        +0x8 /* 0000026C */
  256. 00000266  2200                     move.l     D1, D0
  257. 00000268  7000                     moveq.l    D0, 0x00
  258. 0000026A  4E75                     rts
  259. label0000026C:
  260. 0000026C  B087                     cmp.l      D0, D7
  261. 0000026E  620C                     bhi        +0xE /* 0000027C */
  262. 00000270  80C1                     divu.w     D0, D1
  263. 00000272  4840                     swap.w     D0
  264. 00000274  3200                     move.w     D1, D0
  265. 00000276  4240                     clr.w      D0
  266. 00000278  4840                     swap.w     D0
  267. 0000027A  4E75                     rts
  268. label0000027C:
  269. 0000027C  B287                     cmp.l      D1, D7
  270. 0000027E  621A                     bhi        +0x1C /* 0000029A */
  271. 00000280  2E00                     move.l     D7, D0
  272. 00000282  4240                     clr.w      D0
  273. 00000284  4840                     swap.w     D0
  274. 00000286  80C1                     divu.w     D0, D1
  275. 00000288  4840                     swap.w     D0
  276. 0000028A  4847                     swap.w     D7
  277. 0000028C  3E00                     move.w     D7, D0
  278. 0000028E  4847                     swap.w     D7
  279. 00000290  8EC1                     divu.w     D7, D1
  280. 00000292  3007                     move.w     D0, D7
  281. 00000294  4847                     swap.w     D7
  282. 00000296  3207                     move.w     D1, D7
  283. 00000298  4E75                     rts
  284. label0000029A:
  285. 0000029A  2400                     move.l     D2, D0
  286. 0000029C  2601                     move.l     D3, D1
  287. label0000029E:
  288. 0000029E  E288                     lsr        D0, 1
  289. 000002A0  E289                     lsr        D1, 1
  290. 000002A2  B287                     cmp.l      D1, D7
  291. 000002A4  62F8                     bhi        -0x6 /* 0000029E */
  292. 000002A6  80C1                     divu.w     D0, D1
  293. 000002A8  C087                     and.l      D0, D7
  294. label000002AA:
  295. 000002AA  3203                     move.w     D1, D3
  296. 000002AC  C2C0                     mulu.w     D1, D0
  297. 000002AE  2E03                     move.l     D7, D3
  298. 000002B0  4847                     swap.w     D7
  299. 000002B2  CEC0                     mulu.w     D7, D0
  300. 000002B4  4847                     swap.w     D7
  301. 000002B6  D287                     add.l      D1, D7
  302. 000002B8  6508                     bcs        +0xA /* 000002C2 */
  303. 000002BA  9282                     sub.l      D1, D2
  304. 000002BC  6204                     bhi        +0x6 /* 000002C2 */
  305. 000002BE  4481                     neg.l      D1
  306. 000002C0  4E75                     rts
  307. label000002C2:
  308. 000002C2  5340                     subq.w     D0, 1
  309. 000002C4  60E4                     bra        -0x1A /* 000002AA */
  310. fn000002C6:
  311. 000002C6  323C A9F0                move.w     D1, 0xA9F0
  312. 000002CA  43FA FD80                lea.l      A1, [PC - 0x280 /* 0000004C, value 0x48E7FFF8 */]
  313. 000002CE  4EBA 0068                jsr        [PC + 0x68 /* 00000338 */]
  314. 000002D2  323C A9F2                move.w     D1, 0xA9F2
  315. 000002D6  43FA FD6E                lea.l      A1, [PC - 0x292 /* 00000046, value 0x4EBA02AE */]
  316. 000002DA  4EBA 005C                jsr        [PC + 0x5C /* 00000338 */]
  317. 000002DE  323C A9F3                move.w     D1, 0xA9F3
  318. 000002E2  43FA FD62                lea.l      A1, [PC - 0x29E /* 00000046, value 0x4EBA02AE */]
  319. 000002E6  4EBA 0050                jsr        [PC + 0x50 /* 00000338 */]
  320. 000002EA  323C A9F4                move.w     D1, 0xA9F4
  321. 000002EE  43FA FD52                lea.l      A1, [PC - 0x2AE /* 00000042, value 0x4EBA0334 */]
  322. 000002F2  4EFA 0044                jmp        [PC + 0x44 /* 00000338 */]
  323. fn000002F6:
  324. 000002F6  2F08                     move.l     -[A7], A0
  325. 000002F8  206F 0008                movea.l    A0, [A7 + 0x8]
  326. 000002FC  2F68 0002 0008           move.l     [A7 + 0x8], [A0 + 0x2]
  327. 00000302  2078 02A6                movea.l    A0, [0x000002A6 /* SysZone */]
  328. 00000306  700C                     moveq.l    D0, 0x0C
  329. 00000308  D090                     add.l      D0, [A0]
  330. 0000030A  B0B8 02AA                cmp.l      D0, [0x000002AA /* ApplZone */]
  331. 0000030E  6624                     bne        +0x26 /* 00000334 */
  332. 00000310  4EBA 0066                jsr        [PC + 0x66 /* 00000378 */]
  333. 00000314  323C A9F0                move.w     D1, 0xA9F0
  334. 00000318  4EBA 003A                jsr        [PC + 0x3A /* 00000354 */]
  335. 0000031C  323C A9F2                move.w     D1, 0xA9F2
  336. 00000320  4EBA 0032                jsr        [PC + 0x32 /* 00000354 */]
  337. 00000324  323C A9F3                move.w     D1, 0xA9F3
  338. 00000328  4EBA 002A                jsr        [PC + 0x2A /* 00000354 */]
  339. 0000032C  323C A9F4                move.w     D1, 0xA9F4
  340. 00000330  4EBA 0022                jsr        [PC + 0x22 /* 00000354 */]
  341. label00000334:
  342. 00000334  205F                     movea.l    A0, [A7]+
  343. 00000336  4E75                     rts
  344. fn00000338:
  345. 00000338  3001                     move.w     D0, D1
  346. 0000033A  A146                     syscall    GetTrapAddress, flags=1
  347. 0000033C  2448                     movea.l    A2, A0
  348. 0000033E  700C                     moveq.l    D0, 0x0C
  349. 00000340  A51E                     syscall    NewPtrSys, flags=5
  350. 00000342  3001                     move.w     D0, D1
  351. 00000344  A047                     syscall    SetTrapAddress
  352. 00000346  30FC 4EB9                move.w     [A0]+, 0x4EB9
  353. 0000034A  20C9                     move.l     [A0]+, A1
  354. 0000034C  30FC 4EF9                move.w     [A0]+, 0x4EF9
  355. 00000350  20CA                     move.l     [A0]+, A2
  356. 00000352  4E75                     rts
  357. fn00000354:
  358. 00000354  3001                     move.w     D0, D1
  359. 00000356  A146                     syscall    GetTrapAddress, flags=1
  360. 00000358  2268 0008                movea.l    A1, [A0 + 0x8]
  361. 0000035C  A01F                     syscall    DisposPtr/DisposePtr
  362. 0000035E  3001                     move.w     D0, D1
  363. 00000360  2049                     movea.l    A0, A1
  364. 00000362  A047                     syscall    SetTrapAddress
  365. 00000364  4E75                     rts
  366. 00000366  0000 0000                ori.b      D0, 0x0
  367. 0000036A  0000 0000                ori.b      D0, 0x0
  368. export_9:
  369. 0000036E  41FA FFF6                lea.l      A0, [PC - 0xA /* 00000366, value 0x0, cstring "" */]
  370. 00000372  20AF 0004                move.l     [A0], [A7 + 0x4]
  371. 00000376  4E75                     rts
  372. fn00000378:
  373. 00000378  41FA FFEC                lea.l      A0, [PC - 0x14 /* 00000366, value 0x0, cstring "" */]
  374. 0000037C  2010                     move.l     D0, [A0]
  375. 0000037E  6706                     beq        +0x8 /* 00000386 */
  376. 00000380  4290                     clr.l      [A0]
  377. 00000382  2040                     movea.l    A0, D0
  378. 00000384  4E90                     jsr        [A0]
  379. label00000386:
  380. 00000386  203A FFE2                move.l     D0, [PC - 0x1E /* 0000036A, value 0x0, cstring "" */]
  381. 0000038A  6704                     beq        +0x6 /* 00000390 */
  382. 0000038C  2040                     movea.l    A0, D0
  383. 0000038E  4290                     clr.l      [A0]
  384. label00000390:
  385. 00000390  4E75                     rts
  386. fn00000392:
  387. 00000392  7E00                     moveq.l    D7, 0x00
  388. 00000394  51F8 0A5E                sf         [0x00000A5E /* ResLoad */]
  389. 00000398  598F                     subq.l     A7, 4
  390. 0000039A  2F06                     move.l     -[A7], D6
  391. 0000039C  3F07                     move.w     -[A7], D7
  392. 0000039E  A9A0                     syscall    GetResource
  393. 000003A0  201F                     move.l     D0, [A7]+
  394. 000003A2  6700 00AE                beq        +0xB0 /* 00000452 */
  395. 000003A6  2640                     movea.l    A3, D0
  396. 000003A8  598F                     subq.l     A7, 4
  397. 000003AA  2F0B                     move.l     -[A7], A3
  398. 000003AC  A9A5                     syscall    GetResourceSizeOnDisk/SizeResource/SizeRsrc
  399. 000003AE  261F                     move.l     D3, [A7]+
  400. 000003B0  200B                     move.l     D0, A3
  401. 000003B2  2803                     move.l     D4, D3
  402. 000003B4  5247                     addq.w     D7, 1
  403. 000003B6  EF47                     asl        D7.w, 7
  404. 000003B8  5247                     addq.w     D7, 1
  405. 000003BA  3A07                     move.w     D5, D7
  406. 000003BC  6016                     bra        +0x18 /* 000003D4 */
  407. label000003BE:
  408. 000003BE  598F                     subq.l     A7, 4
  409. 000003C0  2F06                     move.l     -[A7], D6
  410. 000003C2  3F07                     move.w     -[A7], D7
  411. 000003C4  A9A0                     syscall    GetResource
  412. 000003C6  201F                     move.l     D0, [A7]+
  413. 000003C8  6700 0088                beq        +0x8A /* 00000452 */
  414. 000003CC  5247                     addq.w     D7, 1
  415. 000003CE  0684 0000 7FFE           addi.l     D4, 0x7FFE
  416. label000003D4:
  417. 000003D4  558F                     subq.l     A7, 2
  418. 000003D6  2F00                     move.l     -[A7], D0
  419. 000003D8  A9A6                     syscall    GetResAttrs
  420. 000003DA  301F                     move.w     D0, [A7]+
  421. 000003DC  0800 0005                btst.b     D0, 0x5
  422. 000003E0  66DC                     bne        -0x22 /* 000003BE */
  423. 000003E2  50F8 0A5E                st         [0x00000A5E /* ResLoad */]
  424. 000003E6  CF45                     exg        D7, D5
  425. 000003E8  9A47                     sub.w      D5, D7
  426. 000003EA  661C                     bne        +0x1E /* 00000408 */
  427. 000003EC  2003                     move.l     D0, D3
  428. 000003EE  A040                     syscall    ResrvMem/ReserveMem
  429. 000003F0  2F0B                     move.l     -[A7], A3
  430. 000003F2  A9A2                     syscall    LoadResource
  431. 000003F4  2013                     move.l     D0, [A3]
  432. 000003F6  6700 005A                beq        +0x5C /* 00000452 */
  433. 000003FA  2F0B                     move.l     -[A7], A3
  434. 000003FC  A992                     syscall    DetachResource
  435. 000003FE  2853                     movea.l    A4, [A3]
  436. 00000400  204B                     movea.l    A0, A3
  437. 00000402  A029                     syscall    HLock
  438. 00000404  7001                     moveq.l    D0, 0x01
  439. 00000406  4E75                     rts
  440. label00000408:
  441. 00000408  2004                     move.l     D0, D4
  442. 0000040A  A11E                     syscall    NewPtr, flags=1
  443. 0000040C  2008                     move.l     D0, A0
  444. 0000040E  6700 0042                beq        +0x44 /* 00000452 */
  445. 00000412  2848                     movea.l    A4, A0
  446. 00000414  2F0B                     move.l     -[A7], A3
  447. 00000416  A9A2                     syscall    LoadResource
  448. 00000418  2013                     move.l     D0, [A3]
  449. 0000041A  6700 0036                beq        +0x38 /* 00000452 */
  450. 0000041E  204B                     movea.l    A0, A3
  451. 00000420  2003                     move.l     D0, D3
  452. 00000422  6018                     bra        +0x1A /* 0000043C */
  453. label00000424:
  454. 00000424  598F                     subq.l     A7, 4
  455. 00000426  2F06                     move.l     -[A7], D6
  456. 00000428  3F07                     move.w     -[A7], D7
  457. 0000042A  A9A0                     syscall    GetResource
  458. 0000042C  201F                     move.l     D0, [A7]+
  459. 0000042E  6700 0022                beq        +0x24 /* 00000452 */
  460. 00000432  5247                     addq.w     D7, 1
  461. 00000434  2040                     movea.l    A0, D0
  462. 00000436  203C 0000 7FFE           move.l     D0, 0x7FFE
  463. label0000043C:
  464. 0000043C  2F08                     move.l     -[A7], A0
  465. 0000043E  2050                     movea.l    A0, [A0]
  466. 00000440  224C                     movea.l    A1, A4
  467. 00000442  D9C0                     add.l      A4, D0
  468. 00000444  A02E                     syscall    BlockMove/BlockMoveData
  469. 00000446  A9A3                     syscall    ReleaseResource
  470. 00000448  51CD FFDA                dbf        D5, -0x28 /* 00000424 */
  471. 0000044C  99C4                     sub.l      A4, D4
  472. 0000044E  264C                     movea.l    A3, A4
  473. 00000450  7001                     moveq.l    D0, 0x01
  474. label00000452:
  475. 00000452  4E75                     rts
  476. 00000454  204B                     movea.l    A0, A3
  477. 00000456  4A45                     tst.w      D5
  478. 00000458  6604                     bne        +0x6 /* 0000045E */
  479. 0000045A  A023                     syscall    DisposHandle/DisposeHandle
  480. 0000045C  4E75                     rts
  481. label0000045E:
  482. 0000045E  A01F                     syscall    DisposPtr/DisposePtr
  483. 00000460  4E75                     rts
  484.